home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 12-08.C < prev    next >
Text File  |  1991-05-06  |  535b  |  32 lines
  1. main()
  2. {
  3.    int old_mode;
  4.    int row;
  5.  
  6.    old_mode = fg_getmode();
  7.    fg_setmode(3);
  8.  
  9.    if (fg_mouseini() < 0) {
  10.       fg_setmode(old_mode);
  11.       fg_reset();
  12.       exit();
  13.       }
  14.  
  15.    fg_setattr(7,0,0);
  16.    fg_rect(0,fg_getmaxx(),0,fg_getmaxy());
  17.  
  18.    fg_setattr(12,7,0);
  19.    for (row = 0; row < 25; row++) {
  20.       fg_locate(row,34);
  21.       fg_text("example 12-8",12);
  22.       }
  23.  
  24.    fg_mousevis(1);
  25.    fg_waitkey();
  26.    fg_mousecur(0x7FFF,0x7F00);
  27.    fg_waitkey();
  28.  
  29.    fg_setmode(old_mode);
  30.    fg_reset();
  31. }
  32.